3.267 \(\int \frac {\cos ^6(x)}{a-a \sin ^2(x)} \, dx\)

Optimal. Leaf size=33 \[ \frac {3 x}{8 a}+\frac {\sin (x) \cos ^3(x)}{4 a}+\frac {3 \sin (x) \cos (x)}{8 a} \]

[Out]

3/8*x/a+3/8*cos(x)*sin(x)/a+1/4*cos(x)^3*sin(x)/a

________________________________________________________________________________________

Rubi [A]  time = 0.06, antiderivative size = 33, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 3, integrand size = 16, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.188, Rules used = {3175, 2635, 8} \[ \frac {3 x}{8 a}+\frac {\sin (x) \cos ^3(x)}{4 a}+\frac {3 \sin (x) \cos (x)}{8 a} \]

Antiderivative was successfully verified.

[In]

Int[Cos[x]^6/(a - a*Sin[x]^2),x]

[Out]

(3*x)/(8*a) + (3*Cos[x]*Sin[x])/(8*a) + (Cos[x]^3*Sin[x])/(4*a)

Rule 8

Int[a_, x_Symbol] :> Simp[a*x, x] /; FreeQ[a, x]

Rule 2635

Int[((b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> -Simp[(b*Cos[c + d*x]*(b*Sin[c + d*x])^(n - 1))/(d*n),
x] + Dist[(b^2*(n - 1))/n, Int[(b*Sin[c + d*x])^(n - 2), x], x] /; FreeQ[{b, c, d}, x] && GtQ[n, 1] && Integer
Q[2*n]

Rule 3175

Int[(u_.)*((a_) + (b_.)*sin[(e_.) + (f_.)*(x_)]^2)^(p_), x_Symbol] :> Dist[a^p, Int[ActivateTrig[u*cos[e + f*x
]^(2*p)], x], x] /; FreeQ[{a, b, e, f, p}, x] && EqQ[a + b, 0] && IntegerQ[p]

Rubi steps

\begin {align*} \int \frac {\cos ^6(x)}{a-a \sin ^2(x)} \, dx &=\frac {\int \cos ^4(x) \, dx}{a}\\ &=\frac {\cos ^3(x) \sin (x)}{4 a}+\frac {3 \int \cos ^2(x) \, dx}{4 a}\\ &=\frac {3 \cos (x) \sin (x)}{8 a}+\frac {\cos ^3(x) \sin (x)}{4 a}+\frac {3 \int 1 \, dx}{8 a}\\ &=\frac {3 x}{8 a}+\frac {3 \cos (x) \sin (x)}{8 a}+\frac {\cos ^3(x) \sin (x)}{4 a}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.00, size = 26, normalized size = 0.79 \[ \frac {\frac {3 x}{8}+\frac {1}{4} \sin (2 x)+\frac {1}{32} \sin (4 x)}{a} \]

Antiderivative was successfully verified.

[In]

Integrate[Cos[x]^6/(a - a*Sin[x]^2),x]

[Out]

((3*x)/8 + Sin[2*x]/4 + Sin[4*x]/32)/a

________________________________________________________________________________________

fricas [A]  time = 0.42, size = 23, normalized size = 0.70 \[ \frac {{\left (2 \, \cos \relax (x)^{3} + 3 \, \cos \relax (x)\right )} \sin \relax (x) + 3 \, x}{8 \, a} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^6/(a-a*sin(x)^2),x, algorithm="fricas")

[Out]

1/8*((2*cos(x)^3 + 3*cos(x))*sin(x) + 3*x)/a

________________________________________________________________________________________

giac [A]  time = 0.12, size = 36, normalized size = 1.09 \[ \frac {3 \, \arctan \left (\tan \relax (x)\right )}{8 \, a} + \frac {\frac {3 \, \tan \relax (x)^{3}}{a} + \frac {5 \, \tan \relax (x)}{a}}{8 \, {\left (\tan \relax (x)^{2} + 1\right )}^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^6/(a-a*sin(x)^2),x, algorithm="giac")

[Out]

3/8*arctan(tan(x))/a + 1/8*(3*tan(x)^3/a + 5*tan(x)/a)/(tan(x)^2 + 1)^2

________________________________________________________________________________________

maple [A]  time = 0.15, size = 40, normalized size = 1.21 \[ \frac {\tan \relax (x )}{4 a \left (\tan ^{2}\relax (x )+1\right )^{2}}+\frac {3 \tan \relax (x )}{8 a \left (\tan ^{2}\relax (x )+1\right )}+\frac {3 \arctan \left (\tan \relax (x )\right )}{8 a} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(x)^6/(a-a*sin(x)^2),x)

[Out]

1/4/a*tan(x)/(tan(x)^2+1)^2+3/8/a*tan(x)/(tan(x)^2+1)+3/8/a*arctan(tan(x))

________________________________________________________________________________________

maxima [A]  time = 0.45, size = 37, normalized size = 1.12 \[ \frac {3 \, \tan \relax (x)^{3} + 5 \, \tan \relax (x)}{8 \, {\left (a \tan \relax (x)^{4} + 2 \, a \tan \relax (x)^{2} + a\right )}} + \frac {3 \, x}{8 \, a} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^6/(a-a*sin(x)^2),x, algorithm="maxima")

[Out]

1/8*(3*tan(x)^3 + 5*tan(x))/(a*tan(x)^4 + 2*a*tan(x)^2 + a) + 3/8*x/a

________________________________________________________________________________________

mupad [B]  time = 13.61, size = 25, normalized size = 0.76 \[ \frac {\sin \left (2\,x\right )}{4\,a}+\frac {\sin \left (4\,x\right )}{32\,a}+\frac {3\,x}{8\,a} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(x)^6/(a - a*sin(x)^2),x)

[Out]

sin(2*x)/(4*a) + sin(4*x)/(32*a) + (3*x)/(8*a)

________________________________________________________________________________________

sympy [B]  time = 12.93, size = 473, normalized size = 14.33 \[ \frac {3 x \tan ^{8}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {12 x \tan ^{6}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {18 x \tan ^{4}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {12 x \tan ^{2}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {3 x}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} - \frac {10 \tan ^{7}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {6 \tan ^{5}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} - \frac {6 \tan ^{3}{\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} + \frac {10 \tan {\left (\frac {x}{2} \right )}}{8 a \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)**6/(a-a*sin(x)**2),x)

[Out]

3*x*tan(x/2)**8/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a) + 12*x*tan(x/
2)**6/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a) + 18*x*tan(x/2)**4/(8*a
*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a) + 12*x*tan(x/2)**2/(8*a*tan(x/2)*
*8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a) + 3*x/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 +
48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a) - 10*tan(x/2)**7/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/
2)**4 + 32*a*tan(x/2)**2 + 8*a) + 6*tan(x/2)**5/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*
tan(x/2)**2 + 8*a) - 6*tan(x/2)**3/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 +
8*a) + 10*tan(x/2)/(8*a*tan(x/2)**8 + 32*a*tan(x/2)**6 + 48*a*tan(x/2)**4 + 32*a*tan(x/2)**2 + 8*a)

________________________________________________________________________________________